home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr49 / actlib13.zip / STRINGS.ZIP / ISALPHA.C < prev    next >
C/C++ Source or Header  |  1993-02-25  |  533b  |  26 lines
  1. /*  Copyright (C) 1993   Marc Stern  (internet: stern@mble.philips.be)  */
  2.  
  3. #include "strings.h"
  4. #include <ctype.h>
  5.  
  6. /***
  7.  *  Function    :  strisalpha
  8.  *
  9.  *  Description :  Tests if a string contains only alphabetical character
  10.  *
  11.  *  Parameters  :  in   char   *string
  12.  *
  13.  *  Return      :  1 if string contains only alphabetical characters.
  14.  *                 0 otherwise
  15.  *
  16.  *  OS/Compiler :  All
  17.  ***/
  18.  
  19. int strisalpha( const char *string )
  20.  
  21. {
  22.   while ( isalpha(*string++) );
  23.  
  24.   return( ! *--string );
  25. }
  26.